

instrument {overlay = true,
           name = 'Script Bandera',
                overlay= true } 

input_group {
    "Compra", 
    comprar_color = input {default = "green", type = input.color} 
}

input_group {
    "Periodo Max/Min", 
    doch_time = input {default = "30", type = input.string} 
}

input_group {
    "Periodo da Micro Tendencia", 
    emaa_per = input {default = "21", type = input.string} 
}

input_group {
    "Periodo da  Macro Tendencia", 
    emab_per = input {default = "200", type = input.string} 
}

input_group {
    "Media Rapida", 
    emac_per = input {default = "7", type = input.string} 
}

input_group {
    "Media Lenta", 
    emad_per = input {default = "17", type = input.string} 
}

input_group {
    "Venda", 
    vender_color = input {default = "red", type = input.color} 
}

input_group {
    "Resistencia", 
    upline_color = input {default = "red", type = input.color} 
}

input_group {
    "Suporte", 
    lowline_color = input {default = "green", type = input.color} 
}

input_group {
    "Candles",
    positivo = input { default = "green",type = input.color },
    neutro   = input { default = "white", type = input.color },
    negativo = input { default = "red",  type = input.color },
}

--PARAMETROS

EMAA   = ema(close,emaa_per)
EMAB   = ema(close,emab_per)
EMAC   = ema(hlc3,emac_per)
EMAD   = ema(hlc3,emad_per)
upper  = highest (high, doch_time)
lower  = lowest  (low,  doch_time)

--CALCULOS

TA    = ((close > close[1]) and (close > EMAA) and (EMAA > EMAA[1]))
TB    = ((close < close[1]) and (close < EMAA) and (EMAA < EMAA[1]))
ENC   = ((EMAC[1] < EMAD[1]) and (EMAC > EMAD))
ENV   = ((EMAC[1] > EMAD[1]) and (EMAC < EMAD))

sec = security (current_ticker_id, "1m")
if sec then

local bar_color

if (TA == true) then
    bar_color = positivo
elseif (TB == true) then
    bar_color = negativo
else
    bar_color = neutro
end

    plot_candle (open, high, low, close, "ES", bar_color)
    plot (upper, "Resistencia", upline_color)
    plot (lower, "Suporte",lowline_color)
    

    
--NEGOCIAO
    
    plot_shape((ENV), 
        "VENDER", 
        shape_style.flag, 
        shape_size.huge,
        vender_color, 
        shape_location.abovebar, 
        0, 
        "PUT", 
        vender_color)

    plot_shape((ENC), 
        "COMPRAR", 
        shape_style.flag, 
        shape_size.huge,
        comprar_color, 
        shape_location.belowbar, 
        0, 
        "CALL", 
        comprar_color)
        
end